From: John Wiegley <johnw@newartisans.com>
Date: Fri, 18 May 2001 16:40:11 +0000 (+0000)
Subject: (eshell-explicit-command-char): A new configuration variable, which
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~40220
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=8f56a67177ea8f22cbd025194788c4ca02029c7d;p=emacs.git

(eshell-explicit-command-char): A new configuration variable, which
determines the initial character that forces use of an external
version of a command.  The default is *, but may be set to \, for
example.
(eshell-explicit-command): Use `eshell-explicit-command-char' instead
of ?*.
---

diff --git a/lisp/eshell/esh-ext.el b/lisp/eshell/esh-ext.el
index 25abb687a12..52ca3392a2c 100644
--- a/lisp/eshell/esh-ext.el
+++ b/lisp/eshell/esh-ext.el
@@ -150,6 +150,13 @@ by the user on the command line."
   :type 'integer
   :group 'eshell-ext)
 
+(defcustom eshell-explicit-command-char ?*
+  "*If this char occurs before a command name, call it externally.
+That is, although vi may be an alias, *vi will always call the
+external version.  UNIX users may prefer this variable to be \."
+  :type 'character
+  :group 'eshell-ext)
+
 ;;; Functions:
 
 (defun eshell-ext-initialize ()
@@ -161,7 +168,7 @@ by the user on the command line."
   "If a command name begins with `*', call it externally always.
 This bypasses all Lisp functions and aliases."
   (when (and (> (length command) 1)
-	     (eq (aref command 0) ?*))
+	     (eq (aref command 0) eshell-explicit-command-char))
     (let ((cmd (eshell-search-path (substring command 1))))
       (if cmd
 	  (or (eshell-external-command cmd args)